home *** CD-ROM | disk | FTP | other *** search
/ Multimedia Plus / Multimedia Plus with ClearVue Version 10-94 (Knowledge Media Inc.).ISO / dos / anim / flilib / flisrc / fcuncomp.asm < prev    next >
Assembly Source File  |  1989-11-10  |  671b  |  55 lines
  1.  
  2. _TEXT    SEGMENT  BYTE PUBLIC 'CODE'
  3.  
  4.     ASSUME  CS: _TEXT 
  5.  
  6.     public _fii_mem_fcuncomp
  7.     ;uncompress color palette onto a buffer
  8. _fii_mem_fcuncomp proc far
  9.     push bp
  10.     mov bp,sp
  11.     push ds
  12.     push si
  13.     push di
  14.     push cx
  15.     push bx
  16.     cld
  17.  
  18.     lds si,[bp+4+2]
  19.     les di,[bp+8+2]
  20.     lodsw
  21.     mov bx, ax   ;get the count
  22.     test bx,bx
  23.     jmp endu
  24. u:
  25.     lodsb        ;get colors to skip
  26.     add di,ax
  27.     add di,ax
  28.     add di,ax
  29.     lodsb        ;get colors to copy
  30.     or  al,al    ;test for zero
  31.     jnz    u2
  32.     mov ax,256
  33. u2:
  34.     mov cx,ax
  35.     add cx,ax
  36.     add cx,ax
  37.     rep movsb
  38.     dec bx
  39. endu:
  40.     jnz u
  41.  
  42.     pop bx
  43.     pop cx
  44.     pop di
  45.     pop si
  46.     pop ds
  47.     pop    bp
  48.     ret    
  49.  
  50. _fii_mem_fcuncomp endp
  51.  
  52.  
  53. _TEXT    ENDS
  54. END
  55.